home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 2003 September / PC Answers September 2003.iso / Software / freeware / pixeltoolbox / Setup.exe / Main / PixelToolbox.exe / PixelToolbox.dxr / Scripts_37_fill tools.ls < prev    next >
Encoding:
Text File  |  2002-06-08  |  2.6 KB  |  66 lines
  1. global gSize, gCast, gVariable, gFirstColor, myCurrentImage, myCurrentPreview, pPixelActorListX, pPixelActorListY, pSpreadListX, pSpreadListY
  2.  
  3. on toolFill
  4.   cursor = 4
  5.   if member(gSize & "x" & gSize, gCast).image.getPixel((the mouseH - sprite(1).left) * 2 / gVariable / 2, (the mouseV - sprite(1).top) * 2 / gVariable / 2) = gFirstColor then
  6.     nothing()
  7.   else
  8.     member("state1 - " & gSize, gCast).image = member(gSize & "x" & gSize, gCast).image
  9.     pPixelActorListX = []
  10.     pPixelActorListY = []
  11.     pSpreadListX = [1, 0, -1, 0]
  12.     pSpreadListY = [0, 1, 0, -1]
  13.     myCurrentImage = duplicate(member(gSize & "x" & gSize, gCast).image)
  14.     myCurrentPreview = duplicate(member("preview", gCast).image)
  15.     fillColor = gFirstColor
  16.     startX = (the mouseH - sprite(1).left) * 2 / gVariable / 2
  17.     startY = (the mouseV - sprite(1).top) * 2 / gVariable / 2
  18.     sprite(1).mFlood(startX, startY, fillColor)
  19.     member(gSize & "x" & gSize, gCast).image.copyPixels(myCurrentImage, myCurrentImage.rect, myCurrentImage.rect)
  20.     updateStage()
  21.     fnUpdatePreview()
  22.   end if
  23.   cursor = 259
  24.   pPixelActorListX = []
  25.   pPixelActorListY = []
  26.   pSpreadListX = [1, 0, -1, 0]
  27.   pSpreadListY = [0, 1, 0, -1]
  28.   sprite(35).pState = 0
  29.   sendSprite(35, #setMember)
  30.   member("state2 - " & gSize, gCast).image = member(gSize & "x" & gSize, gCast).image
  31.   myCurrentImage = VOID
  32.   myCurrentPreview = VOID
  33. end
  34.  
  35. on toolCheckerFill
  36.   sprite(1).cursor = 4
  37.   if member(gSize & "x" & gSize, gCast).image.getPixel((the mouseH - sprite(1).left) * 2 / gVariable / 2, (the mouseV - sprite(1).top) * 2 / gVariable / 2) = gFirstColor then
  38.     nothing()
  39.   else
  40.     member("state1 - " & gSize, gCast).image = member(gSize & "x" & gSize, gCast).image
  41.     pPixelActorListX = []
  42.     pPixelActorListY = []
  43.     pSpreadListX = [1, 0, -1, 0]
  44.     pSpreadListY = [0, 1, 0, -1]
  45.     myCurrentImage = duplicate(member(gSize & "x" & gSize, gCast).image)
  46.     myCurrentPreview = duplicate(member("preview", gCast).image)
  47.     fillColor = gFirstColor
  48.     startX = (the mouseH - sprite(1).left) * 2 / gVariable / 2
  49.     startY = (the mouseV - sprite(1).top) * 2 / gVariable / 2
  50.     sprite(1).mFlood2(startX, startY, fillColor)
  51.     member(gSize & "x" & gSize, gCast).image.copyPixels(myCurrentImage, myCurrentImage.rect, myCurrentImage.rect)
  52.     updateStage()
  53.     fnUpdatePreview()
  54.   end if
  55.   sprite(1).cursor = [344, 345]
  56.   pPixelActorListX = []
  57.   pPixelActorListY = []
  58.   pSpreadListX = [1, 0, -1, 0]
  59.   pSpreadListY = [0, 1, 0, -1]
  60.   sprite(35).pState = 0
  61.   sendSprite(35, #setMember)
  62.   member("state2 - " & gSize, gCast).image = member(gSize & "x" & gSize, gCast).image
  63.   myCurrentImage = VOID
  64.   myCurrentPreview = VOID
  65. end
  66.